home *** CD-ROM | disk | FTP | other *** search
/ Suzy B Software 2 / Suzy B Software CD-ROM 2 (1994).iso / extras / programm / gemfsc20 / gemfsc20.lzh / GEMFBIND / AESEVNT6.S < prev    next >
Text File  |  1993-03-10  |  790b  |  32 lines
  1.  
  2. ;*========================================================================
  3. ;*
  4. ;* AESFAST Public Domain GEM bindings.
  5. ;*
  6. ;*========================================================================
  7.  
  8.  
  9. ;*************************************************************************
  10. ;*
  11. ;* Event manager routines 6 of n.
  12. ;*
  13. ;*************************************************************************
  14.  
  15. ;-------------------------------------------------------------------------
  16. ; evnt_dclick
  17. ;-------------------------------------------------------------------------
  18.  
  19.           globl     _evnt_dclick
  20. _evnt_dclick:
  21. ;          .cargs    #4,new,flag
  22.  
  23. new             =    4
  24. flag            =    6
  25.  
  26.           move.l    #$1A020100,d0       ; AControl  26,2,1,0
  27.           lea        new(sp),a1           ; -> intin
  28.           jmp        aes_do
  29.  
  30. ;          end of code
  31.  
  32.